00100	SAILON NUMBER 68.			                GEOMED MANUAL
00200	
00300	
00400	STANFORD ARTIFICIAL INTELLIGENCE LABORATORY                MARCH 1973
00500	OPERATING NOTE NUMBER 68.
00600	
00700	
00800	                   GEOMED  -  GEOMETRIC EDITOR.
00900	
01000	
01100	                          Bruce g. Baumgart
01200	
01300	
01400	ABSTRACT: GEOMED is a 3D drawing program.
01500		
     

     

     

00100	Frames of Referance.
00200	Euclidean Transformations.
00300	
00400	1. TRAN ← MKTRAN(REFRAM,OPAXCNT,DELTA);
00500	
00600	OPERATION	AXIS	AXIS MODIFIER
00700	
00800	0 TRANSLATION	0 X	0 AXIS.
00900	1 ROTATION   	1 X	1 AXIS.
01000	2 DILATION	2 Y	2 NOT AXIS.
01100	3 REFLECTION	3 Z	3 ALL AXES.
01200	
01300		2*3 + 2*3*3 = 6 + 18 = 24 OPERATIONS.
01400	
01500	MKFRM1(PAN,TILT,SWING)	MAKE FRAME.
01600		PAN ABOUT Y-AXIS
01700		TILT ABOUT X AXIS
01800		SWING ABOUT Z AXIS
01900	Vertex, v, rotation by transformation T.
02000	
02100		X ← XWC(V) - XWC(R);
02200		Y ← YWC(V) - YWC(R);
02300		Z ← ZWC(V) - ZWC(R);
02400	
02500		XWC(V) ← X*IX(R) + Y*IY(R) + Z*IZ(R);
02600		YWC(V) ← X*JX(R) + Y*JY(R) + Z*JZ(R);
02700		ZWC(V) ← X*KX(R) + Y*KY(R) + Z*KZ(R);
02800	
02900		XWC ← XWC(V) + XWC(R);
03000		YWC ← YWC(V) + YWC(R);
03100		ZWC ← ZWC(V) + ZWC(R);
03200	
03300	LINK FETCH COMMANDS.
03350	
03400		CW	α≤	α≥	CCW
03500		DAD	α<	α>	SON
03600		BRO	α←	α→	SIS
03700	
03800		NFACE	≤	≥	PFACE
03900		NED	<	>	PED
04000		NVT	←	→	PVT
04100	
04200		ALT	β≤	β≥	PBODY
04300		CAR(8)	β<	β>	CDR(8)
04400		CAR(9)	β←	β→	CDR(9)
04500	
04600		NCW	ε≤	ε≥	PCW
04700		NCCW	ε<	ε>	PCCW
04800		ALT	ε←	ε→	PBODY